home *** CD-ROM | disk | FTP | other *** search
/ Erect Magazine Extra 10 / Erect Magazine Extra 10 - Disc 1.iso / mac / Menu.DIR / 00001.ls next >
Encoding:
Text File  |  1996-12-07  |  411 b   |  19 lines
  1. on mouseDown
  2.   set spriteNum to the clickOn
  3.   puppetSound("CLICK.AIF")
  4.   updateStage()
  5.   waittime(2)
  6.   repeat while the stillDown
  7.     nothing()
  8.   end repeat
  9.   if spriteNum < 16 then
  10.     put "Mov" & spriteNum - 10 into field "JumpName_T"
  11.     go(marker(1))
  12.   else
  13.     put spriteNum - 15 into field "PhotoGRP_T"
  14.     put 1 into field "PhotoCUR_T"
  15.     put "P_BRO" into field "JumpName_T"
  16.     go("Jump")
  17.   end if
  18. end
  19.